(ns utils
 (:import (org.antlr.stringtemplate StringTemplate ))
 (use clojure.contrib.seq-utils))


(defn properties_seq
  "属性文件到map"
  [file]
  (let [ p (java.util.Properties.)
      is (ClassLoader/getSystemResourceAsStream file)]
  (do
    (. p load is)
     (seq p))))

(defn trim
  [s]
  (.replaceAll s "\\s+" " "))

(def p "vo.set$name(rs.getString(\"$oname\"));" )

(def vo
  [s]
  (let [ c (re-seq "," s)]
    (doseq [ a c]
      (let [ a1 (re-




